3.279 \(\int \frac {\cos ^8(x)}{(a-a \sin ^2(x))^2} \, dx\)

Optimal. Leaf size=33 \[ \frac {3 x}{8 a^2}+\frac {\sin (x) \cos ^3(x)}{4 a^2}+\frac {3 \sin (x) \cos (x)}{8 a^2} \]

[Out]

3/8*x/a^2+3/8*cos(x)*sin(x)/a^2+1/4*cos(x)^3*sin(x)/a^2

________________________________________________________________________________________

Rubi [A]  time = 0.05, antiderivative size = 33, normalized size of antiderivative = 1.00, number of steps used = 4, number of rules used = 3, integrand size = 16, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.188, Rules used = {3175, 2635, 8} \[ \frac {3 x}{8 a^2}+\frac {\sin (x) \cos ^3(x)}{4 a^2}+\frac {3 \sin (x) \cos (x)}{8 a^2} \]

Antiderivative was successfully verified.

[In]

Int[Cos[x]^8/(a - a*Sin[x]^2)^2,x]

[Out]

(3*x)/(8*a^2) + (3*Cos[x]*Sin[x])/(8*a^2) + (Cos[x]^3*Sin[x])/(4*a^2)

Rule 8

Int[a_, x_Symbol] :> Simp[a*x, x] /; FreeQ[a, x]

Rule 2635

Int[((b_.)*sin[(c_.) + (d_.)*(x_)])^(n_), x_Symbol] :> -Simp[(b*Cos[c + d*x]*(b*Sin[c + d*x])^(n - 1))/(d*n),
x] + Dist[(b^2*(n - 1))/n, Int[(b*Sin[c + d*x])^(n - 2), x], x] /; FreeQ[{b, c, d}, x] && GtQ[n, 1] && Integer
Q[2*n]

Rule 3175

Int[(u_.)*((a_) + (b_.)*sin[(e_.) + (f_.)*(x_)]^2)^(p_), x_Symbol] :> Dist[a^p, Int[ActivateTrig[u*cos[e + f*x
]^(2*p)], x], x] /; FreeQ[{a, b, e, f, p}, x] && EqQ[a + b, 0] && IntegerQ[p]

Rubi steps

\begin {align*} \int \frac {\cos ^8(x)}{\left (a-a \sin ^2(x)\right )^2} \, dx &=\frac {\int \cos ^4(x) \, dx}{a^2}\\ &=\frac {\cos ^3(x) \sin (x)}{4 a^2}+\frac {3 \int \cos ^2(x) \, dx}{4 a^2}\\ &=\frac {3 \cos (x) \sin (x)}{8 a^2}+\frac {\cos ^3(x) \sin (x)}{4 a^2}+\frac {3 \int 1 \, dx}{8 a^2}\\ &=\frac {3 x}{8 a^2}+\frac {3 \cos (x) \sin (x)}{8 a^2}+\frac {\cos ^3(x) \sin (x)}{4 a^2}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.00, size = 26, normalized size = 0.79 \[ \frac {\frac {3 x}{8}+\frac {1}{4} \sin (2 x)+\frac {1}{32} \sin (4 x)}{a^2} \]

Antiderivative was successfully verified.

[In]

Integrate[Cos[x]^8/(a - a*Sin[x]^2)^2,x]

[Out]

((3*x)/8 + Sin[2*x]/4 + Sin[4*x]/32)/a^2

________________________________________________________________________________________

fricas [A]  time = 0.42, size = 23, normalized size = 0.70 \[ \frac {{\left (2 \, \cos \relax (x)^{3} + 3 \, \cos \relax (x)\right )} \sin \relax (x) + 3 \, x}{8 \, a^{2}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(x)^8/(a-a*sin(x)^2)^2,x, algorithm="fricas")

[Out]

1/8*((2*cos(x)^3 + 3*cos(x))*sin(x) + 3*x)/a^2

________________________________________________________________________________________

giac [A]  time = 0.12, size = 31, normalized size = 0.94 \[ \frac {3 \, x}{8 \, a^{2}} + \frac {3 \, \tan \relax (x)^{3} + 5 \, \tan \relax (x)}{8 \, {\left (\tan \relax (x)^{2} + 1\right )}^{2} a^{2}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(x)^8/(a-a*sin(x)^2)^2,x, algorithm="giac")

[Out]

3/8*x/a^2 + 1/8*(3*tan(x)^3 + 5*tan(x))/((tan(x)^2 + 1)^2*a^2)

________________________________________________________________________________________

maple [A]  time = 0.16, size = 40, normalized size = 1.21 \[ \frac {\tan \relax (x )}{4 a^{2} \left (\tan ^{2}\relax (x )+1\right )^{2}}+\frac {3 \tan \relax (x )}{8 a^{2} \left (\tan ^{2}\relax (x )+1\right )}+\frac {3 \arctan \left (\tan \relax (x )\right )}{8 a^{2}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cos(x)^8/(a-a*sin(x)^2)^2,x)

[Out]

1/4/a^2*tan(x)/(tan(x)^2+1)^2+3/8/a^2*tan(x)/(tan(x)^2+1)+3/8/a^2*arctan(tan(x))

________________________________________________________________________________________

maxima [A]  time = 0.51, size = 43, normalized size = 1.30 \[ \frac {3 \, \tan \relax (x)^{3} + 5 \, \tan \relax (x)}{8 \, {\left (a^{2} \tan \relax (x)^{4} + 2 \, a^{2} \tan \relax (x)^{2} + a^{2}\right )}} + \frac {3 \, x}{8 \, a^{2}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(x)^8/(a-a*sin(x)^2)^2,x, algorithm="maxima")

[Out]

1/8*(3*tan(x)^3 + 5*tan(x))/(a^2*tan(x)^4 + 2*a^2*tan(x)^2 + a^2) + 3/8*x/a^2

________________________________________________________________________________________

mupad [B]  time = 13.82, size = 29, normalized size = 0.88 \[ \frac {3\,x}{8\,a^2}+\frac {3\,\cos \relax (x)\,{\sin \relax (x)}^3}{8\,a^2}+\frac {5\,{\cos \relax (x)}^3\,\sin \relax (x)}{8\,a^2} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cos(x)^8/(a - a*sin(x)^2)^2,x)

[Out]

(3*x)/(8*a^2) + (3*cos(x)*sin(x)^3)/(8*a^2) + (5*cos(x)^3*sin(x))/(8*a^2)

________________________________________________________________________________________

sympy [B]  time = 69.90, size = 549, normalized size = 16.64 \[ \frac {3 x \tan ^{8}{\left (\frac {x}{2} \right )}}{8 a^{2} \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a^{2} \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a^{2}} + \frac {12 x \tan ^{6}{\left (\frac {x}{2} \right )}}{8 a^{2} \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a^{2} \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a^{2}} + \frac {18 x \tan ^{4}{\left (\frac {x}{2} \right )}}{8 a^{2} \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a^{2} \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a^{2}} + \frac {12 x \tan ^{2}{\left (\frac {x}{2} \right )}}{8 a^{2} \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a^{2} \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a^{2}} + \frac {3 x}{8 a^{2} \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a^{2} \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a^{2}} - \frac {10 \tan ^{7}{\left (\frac {x}{2} \right )}}{8 a^{2} \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a^{2} \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a^{2}} + \frac {6 \tan ^{5}{\left (\frac {x}{2} \right )}}{8 a^{2} \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a^{2} \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a^{2}} - \frac {6 \tan ^{3}{\left (\frac {x}{2} \right )}}{8 a^{2} \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a^{2} \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a^{2}} + \frac {10 \tan {\left (\frac {x}{2} \right )}}{8 a^{2} \tan ^{8}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{6}{\left (\frac {x}{2} \right )} + 48 a^{2} \tan ^{4}{\left (\frac {x}{2} \right )} + 32 a^{2} \tan ^{2}{\left (\frac {x}{2} \right )} + 8 a^{2}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(x)**8/(a-a*sin(x)**2)**2,x)

[Out]

3*x*tan(x/2)**8/(8*a**2*tan(x/2)**8 + 32*a**2*tan(x/2)**6 + 48*a**2*tan(x/2)**4 + 32*a**2*tan(x/2)**2 + 8*a**2
) + 12*x*tan(x/2)**6/(8*a**2*tan(x/2)**8 + 32*a**2*tan(x/2)**6 + 48*a**2*tan(x/2)**4 + 32*a**2*tan(x/2)**2 + 8
*a**2) + 18*x*tan(x/2)**4/(8*a**2*tan(x/2)**8 + 32*a**2*tan(x/2)**6 + 48*a**2*tan(x/2)**4 + 32*a**2*tan(x/2)**
2 + 8*a**2) + 12*x*tan(x/2)**2/(8*a**2*tan(x/2)**8 + 32*a**2*tan(x/2)**6 + 48*a**2*tan(x/2)**4 + 32*a**2*tan(x
/2)**2 + 8*a**2) + 3*x/(8*a**2*tan(x/2)**8 + 32*a**2*tan(x/2)**6 + 48*a**2*tan(x/2)**4 + 32*a**2*tan(x/2)**2 +
8*a**2) - 10*tan(x/2)**7/(8*a**2*tan(x/2)**8 + 32*a**2*tan(x/2)**6 + 48*a**2*tan(x/2)**4 + 32*a**2*tan(x/2)**
2 + 8*a**2) + 6*tan(x/2)**5/(8*a**2*tan(x/2)**8 + 32*a**2*tan(x/2)**6 + 48*a**2*tan(x/2)**4 + 32*a**2*tan(x/2)
**2 + 8*a**2) - 6*tan(x/2)**3/(8*a**2*tan(x/2)**8 + 32*a**2*tan(x/2)**6 + 48*a**2*tan(x/2)**4 + 32*a**2*tan(x/
2)**2 + 8*a**2) + 10*tan(x/2)/(8*a**2*tan(x/2)**8 + 32*a**2*tan(x/2)**6 + 48*a**2*tan(x/2)**4 + 32*a**2*tan(x/
2)**2 + 8*a**2)

________________________________________________________________________________________